home *** CD-ROM | disk | FTP | other *** search
/ Interactive Quarterly / The Best of New Machine Publishing 1 - Disc 4: Interactive Quarterly.iso / pc / cafe / dvd.dir / 00007.ls < prev    next >
Encoding:
Text File  |  1996-08-19  |  1.5 KB  |  69 lines

  1. on CheckRollover
  2.   global theOne
  3.   case rollOver(whichSprite) of
  4.     3:
  5.       set the castNum of sprite 3 to member "Q1"
  6.       if theOne <> 3 then
  7.         turnOff(theOne)
  8.       end if
  9.       set theOne to 3
  10.       updateStage()
  11.     4:
  12.       set the castNum of sprite 4 to member "Q2"
  13.       if theOne <> 4 then
  14.         turnOff(theOne)
  15.       end if
  16.       set theOne to 4
  17.       updateStage()
  18.     6:
  19.       set the castNum of sprite 6 to member "Q3"
  20.       if theOne <> 6 then
  21.         turnOff(theOne)
  22.       end if
  23.       set theOne to 6
  24.       updateStage()
  25.     7:
  26.       set the castNum of sprite 7 to member "Q4"
  27.       if theOne <> 7 then
  28.         turnOff(theOne)
  29.       end if
  30.       set theOne to 7
  31.       updateStage()
  32.     8:
  33.       set the castNum of sprite 8 to member "Q5"
  34.       if theOne <> 8 then
  35.         turnOff(theOne)
  36.       end if
  37.       set theOne to 8
  38.       updateStage()
  39.     9:
  40.       set the castNum of sprite 9 to member "Q6"
  41.       if theOne <> 9 then
  42.         turnOff(theOne)
  43.       end if
  44.       set theOne to 9
  45.       updateStage()
  46.     10:
  47.       set the castNum of sprite 10 to member "Q7"
  48.       if theOne <> 10 then
  49.         turnOff(theOne)
  50.       end if
  51.       set theOne to 10
  52.       updateStage()
  53.     11:
  54.       set the castNum of sprite 11 to member "Q8"
  55.       if theOne <> 11 then
  56.         turnOff(theOne)
  57.       end if
  58.       set theOne to 11
  59.       updateStage()
  60.     13:
  61.       set the castNum of sprite 13 to member "Q9"
  62.       if theOne <> 13 then
  63.         turnOff(theOne)
  64.       end if
  65.       set theOne to 13
  66.       updateStage()
  67.   end case
  68. end
  69.